perm filename MSS.MAN[MAN,LCS]12 blob
sn#136198 filedate 1974-12-13 generic text, type T, neo UTF8
00100 ******** DISPLAYS MUSIC AND DRAWS IT ON THE PLOTTER *******
00200
00300 TO RUN: SEE FILE "CMD[1,LCS]" FOR 'DO' FILES.
00400 (BEST IS TO 'DO BIGMSS.DO' WHILE ALIASED TO [MSS,LCS].
00500 FOR THE PROGRAM TO RUN IT MUST PICK UP SOME SPECIAL
00600 DATA IN THAT AREA.)
00700
00800 ******* KEY TO THE PARAMETER NUMBERS *******
00900
01000 SEE SECTION ON 'SCORE' INPUT FOR FIRST STEPS IN INPUT.
01100 THE FOLLOWING CODE NUMBERS ARE USED MAINLY FOR EDITING.
01200
01300 -------- SECTION I ---------
01400
01500 1 NOTES: 1, POS, STF, NT NUM,
01600 (P5) STEM DIR & ACCI,
01700 (P6) FILLED IN? (≥0), DECIS REFER TO ACCENTS, ETC.
01800 (P7)NUM OF TAILS(0,1=8TH,4=64TH, ETC.)
01900 (IF 2 DIGITS, LFT IS NUM OF DOTS.)
02000 (P8)STEM EXT. BY NT NUM,
02100 (P9)=-1 TO SUPPRESS LEDGER LINES.
02150 (P9 WILL EVENTUALLY STORE RHYTHMIC VALUE FOR SPACING.)
02200 (P10)=1 PUTS SLASH ON GRACE-NOTE TAIL (1000 IN P8=SAME)
02300 P4 100S GIVE MINIS, 200S GIVE DIAMOND SHAPE (HARMONICS)
02400 300S GIVE 'X' NOTES (FOR PERCUSSION, ETC.)
02500 FOR P5: <10= NO STEM, 10-13=STEM UP, 20-23= STEM DOWN
02600 1,11 OR 21=FLAT; 2,12,22=#; 3,13,23=NATURAL
02700 FOR P6: POS NUM OR 0 = BLACK NOTE, ANY NEG NUM = WHITE NOTE.
02800 FOR P6: 10,-10 'HOMES' TO RIGHT OF UPWARD STEM.
02900 20,-20 'HOMES' TO LEFT OF DOWNWARD STEM.
03000 30,-30(FOR 0,-1) PUTS DOTS IN PROPER PLACE IN COMPLEX CHORDS.
03100 IF P7 HAS 2 DIGITS THE NOTE IS DOTTED; 2ND DIG. IS NUM OF TAILS.
03200 IF 2ND DIGIT IS 1 AND P6 IS NEG. A WHOLE NOTE PRINTS.
03300 DECIMALS AFTER P5 OR P7 SPACE OUT ACCIDENTAL OR DOT.
03400 .01 IN P7 PUTS SLASH THROUGH TAIL (SAME AS P10).
03500 DECIMALS AFTER P6 ARE ACCENT NUMS (.4-.7,.9 ETC. SEE CODE #6)
03600 UP TO 2 ACCENTS CAN BE PUT IN THIS WAY.
03700
03800 2 RESTS: 2,POS,STF,HGT,REST(-2=WHOLE, 0=1/4, 1=1/8,ETC),P6) 1=DOTTED
03900
04000 3 CLEFS AND OTHER THINGS:
04100 3, POS, STAFF, P4=HGT CHANGE(TO MAKE SOP. ETC.),P5=CLEF NUM
04200 (CLEF NUMS ARE: TREB=0, BASS=1, ALTO=2, TENOR=3,
04300 4=PF. STAFF BRACKET, 5=HALF, 6=WHOLE, 7=b, 8=#, 9=NAT.
04400 ADD 100 FOR MINICLEFS.) (P6-P9 AS IN CODE 11.)
04500
04600 OTHER THINGS: P5=10 = PPP, 11 = PP, 12 = P, 13 = MP,
04700 14 = MF, 15 = F, 16 = FF, 17 = FFF,
04800 20 = CRESC., 21 = DIM., 22 = SUBITO, 23 = MENO,
04900 24 = ACCEL., 30 = ED, 31=MORDANT
05000 ---- MORE WILL BE ADDED! ---(FILES CLEF0,CLEF1,CLEF2 ARE FULL)
05100
05200 4 LINES: 4,POS,LOWEST STF,
05300 (P4) NUM OF STAVES UP FOR BAR LINE - IF ALL HIGHER
05400 PARAMETERS = 0, OR HGT1 (i.e.VERT. POS1 IF LINE).
05500 FOR HEAVY BAR LINES ADD 100*THICKNESS TO NUMBER IN P4
05600 (BAR LINES DON'T AFFECT TOP AND BOT MAXI'S.)
05700 (P5) HGT2, IF P5=50, A +N IN P7=CRESC., -=DECRESC.
05800 OR, IF P8.NE.0, BOX APPEARS OF SIZE
05900 P8=X (BY HORIZ. NUMS) AND P9=Y (BY NOTE NUMS).
06000 (P6) POS2,
06100 (P7) 1=DASHES IF P5=50 +N IN P7=CRESC., -=DECRESC.
06200 IF P6=P2, MAKES VERTICAL DASHED LINE.
06300 -1 GIVES VERTICAL WAVEY LINE..P6 MUST=0
06400 P9=WIG.UNIT HGT., P8 CAN CHANGE WIGGLE WIDTH, THIS AND NEXT
06500 -2 GIVES HORIZ.WAVEY LINE(P5 GIVES HGT OF WAVE BY NT NUM)
06600 ....P6=RIGHT END POINT OF WIGGLE.
06700 P10=ADDED WIDTH FOR BOTH WIGGLES. (1=1 MORE, ETC.)
06800 (P8) NON-ZERO GIVES HORIZ. BOX SIZE, IF P5=50
06900 IF VERT. DASHES, P8 SETS SIZE.(ALSO AFFECTS WIGGLES.)
07000 (P9) GIVES VERT. BOX SIZE, IF P5=50
07100 AFFECTS VERTICLE WIGGLES ALSO.
07200
07300 5 NUMBERS: 5, POS, STF, NT NUM, SIZE FACTOR, NUM(SINGLE DIGIT ONLY),P7
07400 P7=2 GIVES THIN LINE NUMS., =0 = BDR40 TYPE FONT WHEN IT PLOTS.
07500 =1 = BDI40 (ITALICS)
07600
07700 6 ACCIDS, ACCENTS, ETC.: 6, POS, STF, NOTE NUM, P5, P6=SIZE (0=1)
07800 FOR P5: b=1, #=2, NAT=3, WEDGE ACCENT ∧=4(-4=INV), ACCENT >=5,
07900 FERMATA=6 or 26(-6=INV), STAC. OR DOT=7, REPEAT BAR SIGN=8,
08000 TENUTO OR DASH=9, DNBOW=11, UPBOW=12, HARM,=13, +=14,
08100 THESIS=15, ARSIS=16
08200 ***** 2 ITEMS MAY BE ENTERED AT ONCE WITH P5. e.g. 47 WILL CREATE
08300 A WEDGE(4) WITH A DOT(7) BELOW IT; 79 MAKES A DOT(7) WITH A
08400 DASH(9) BELOW IT. IF ANY OF THE 2-DIGIT CODES ARE USED, THEY
08500 MUST! COME FIRST. e.g. 135 MAKES A HARMONIC(13) WITH AN
08600 ACCENT(5) BELOW. ETC. (513 WILL NOT WORK!)
08700
08800 SET P13 TO 1 FOR AUTOMATIC HOMING.
08900 (SEE HOMING INFO IN EDIT SECTION.)
09000
09100 7 KEY SIG.: 7,POS,STF,NUM OF #S OR FLATS (+=#, -=b),CLEF NUM.
09200 (P5=0=TREB, =1=BASS, =2=ALTO, =3=TENOR)
09300
09400 8 SLURS: 8, POS1, STAFF, NT1, NT2, POS2, P7=DIP(NT UNITS + OR -), P8, P9
09500 FOR P8 0=SLUR, 1=BRACKET, 2=LFT 1/2 BRKT, 3=RT 1/2 BRKT,
09600 FOR AUTOMATIC ALIGNMENT OF SLUR WITH NOTES, SET P13=1, THEN
09700 IF P8=-1, END POINTS WILL HOME TO NOTE CENTERS.
09800 IF P8=-2, END POINTS WILL HOME BETWEEN NOTES.
09900 USE P8=-3 TO HOME BETWEEN NOTES WHERE 1ST IS DOTTED.
10000 P9=CURVE FACTOR. DEFAULT VALUE (0)=3 GIVES SLIGHTLY "FLATTENED"
10100 SLURS. TO MAKE THEM MORE ROUND, DECREASE P9 TOWARD 2.
10200 TO RESTRICT THE CURVE TO THE END PORTIONS, INCREASE P9.
10300
10400 9 BEAMS: 9, POS, STF, NT1, NT2, POS2,
10500 FOR "MINI" BEAMS ADD 100 TO P4 (-100 FOR NEG. NUMS.)
10600 (P7) STEM DIR(10=↑ 20=↓),
10700 -- 2ND DIG. IN P7=TOTAL NUM OF BEAMS.
10800 IF P7 IS NEGATIVE THEN TREMOLO SLASHES ARE MADE.
10900 (P8) 10=LFT, 20=RT.
11000 -10,-20=UNATTACHED PARTIAL BEAMS
11100 A 2ND DIGIT=DISPLACEMENT NUMBER.
11200 -- IF P10 HAS 30+, P8 WILL HAVE POS3 AND
11300 -- P9 WILL HAVE POS4.
11400 (P9) POS3. (OR POS4 IF P10>30.)
11500 (P10) = NUM OF BEAMS DISPLACED (NO MORE THAN 9.)
11600 ADD 10 FOR INNER SHORT PARTIAL →
11700 ADD 20 FOR INNER SHORT PARTIAL ←
11800 ADD 30 FOR INNER PARTIAL BETWEEN TWO STEMS.
11900 P11 CAN RESET HOMING RANGE (OR -1 = NONE.)
12000
12100 10 FOR STAFF LINES: 10,POS1, HGT(3 TO -3), 2ND POS.,
12200 P5) DISPLACEMENT(BY NOTE NUM),
12300 P6) SIZE FACTOR(DECIMAL)
12400 P7) IF SET TO NON-ZERO THE STAFF WILL BE INVISIBLE.
12500 (USE THIS AS A MEANS TO SET SIZE AND POSITION OF
12600 NOT APPEARING ON A STAFF.)
12700
12800 10, 0, STF NUM, WILL GIVE FULL LENGTH STAFF
12900
13000 11 LIBRARY ITEMS: 11, POS, STAFF, NOTE NUM, P5)ITEM NUM,
13100 P6)HORZ. SZ., P7)VERT. SZ., P8, P9, P10
13200 P8=-1 FOR FILL ON CRT, =-2 FOR NO FILL ANYWHERE.
13300
13400 P5 MAY HAVE NUMBERS 0 THROUGH 99. NUMBERS 0-9 REFER TO
13500 THE "BASIC" DRAW FILE. (SEE 'DRAW.MAN' FOR PREPERATION
13600 OF 'DRAW' FILES.) THE "BASIC" FILE SHOULD HAVE A NAME
13700 WITH 4 LETTERS AND THE NUMBER 0 ON THE END. IF THE "BASIC"
13800 NAME IS 'CHAR0' THEN NUMBERS 10 THROUGH 19 WOULD REFER
13900 TO 'CHAR1'; 20-29 TO 'CHAR2', 30-39 TO 'CHAR3', ETC.
14000
14100 P9 = CLOCKWISE ROTATION BY DEGREES.
14200
14300 IF P10 IS SET TO 1 A "BASIC" FILE NAME WILL BE REQUESTED.
14400 THE NAME WILL BE STORED IN P10. ANY TIME P10 IS SET TO 1
14500 THE NAME WILL BE RE-REQUESTED. ANY TIME P10 IS IGNORED THE
14600 LAST NAME GIVEN WILL BE PUT INTO P10.
14700 THUS SEVERAL ITEMS CAN USE DIFFERENT "BASIC" NAMES.
14800
14900 12 CIRCLES AND ARCS: 12, POS, STF, NT NUM,
15000 P5=RADIUS(BY HORIZ. SCALE NUMS)
15100 P6=DEGR.1, P7=DEGR.2; ZEROS GIVE COMPLETE CIRCLE.
15200
15300 13 N --- IF N=1 FROM THIS POINT ON ALL NUMBERS AND LETTERS USING THE
15400 TYPE FONTS BDR AND BDI WILL APPEAR WITH THEIR REAL OUTLINES.
15500 THIS SHOULD BE USED ONLY FOR CHECKING ON CLOSE SPACING AS
15600 THE PROGRAM IS SLOWED CONSIDERABLY DUE TO THE GREAT NUMBER
15700 OF VECTORS TO BE DRAWN.
15800 13,0 WILL RETURN TO THE ORIGINAL DISPLAY MODE. SEE 7 AND 16 IN
15900 REGARD TO FONTS.
16000
16100 14 "SCORE" INPUT: 14, 0, STAFF -- SEE SECTION BELOW.
16200
16300 16 LETTERS, WORDS, ETC.:
16400 16, POS, STAFF, NOTE NUM, SIZE FACTOR, P6
16500 ----- THEN TYPE TEXT -----
16600 ---- SEE SECTION II FOR DETAILS -----
16700
16800 18 METER: 18, POS, STF, TOP NUM, BOTT NUM, HGT, SIZE FACTOR
16900
17000 19 ADJUST STEMS TO MEET BEAMS: 19, STAFF NUM (99=ALL STAVES)
17100 (ALSO REMOVES TAILS WHERE NEEDED)
17200
17300 19 N1 N2 ------ IF 2 NUMBERS FOLLOW 19 THE 1ST SHOULD BE THE ITEM
17400 NUMBER OF A BEAM AND THE 2ND THE ITEM NUMBER OF A NOTE. THIS WILL
17500 CAUSE THE BEAM TO HOME TO ANY NOTE ON A DIFFERENT STAFF.
17600 BEFORE USING THIS, CERTAIN REQUIREMENTS MUST BE MET. P2 AND
17700 P6 SHOULD BOTH BE SET TO THE HORIZANTAL POSITION OF THE ORIGIN OF THE
17800 BEAM (I.E. USUALLY P2). P4 AND P5 SHOULD BE SET THE VERTICAL
17900 POSITION OF THE ORIGIN (USUALLY P4). P7 SHOULD INDICATE THE STEM
18000 DIRECTION OF THE NOTE AT THE ORIGIN POINT. P11 IS BEST SET TO 1 TO
18100 INHIBIT OTHER HOMING FEATURES. IF THE BEAM IS COMPOSITE, THIS
18200 PROCEDURE MUST BE FOLLOWED FOR EACH BEAM ITEM INVOLVED.
18300 THE NOTE ON THE OTHER STAFF MAY HAVE A STEM OF ANY LENGTH AND
18400 IT MAY BE IN FRONT OF OR BEHIND THE ORIGIN POINT OF THE BEAM. IT IS
18500 PROBABLY BEST TO USE THIS FEATURE ONLY AFTER! THE OTHER '19' FEATURE
18600 HAS BEEN USED. CHECK STEM LENGTHS AND MEETING POINTS CAREFULLY AFTER
18700 USE.
18800
18900
19000
19100 20 TRILLS: 20, POS1, STF, NOTE NUM, 0, POS2, P7
19200 IF P7=1, NO WAVEY LINE APPEARS.
19300
19400 24 MAGNIFY AREA: 24,SIZE FACTOR, NEW CENTER X,Y
19500 (USE -512 TO 512 RANGE)
19600 IF THE STAVES -1 THOUGH 2 ARE USED ONLY 2 NUMBERS NEED BE TYPED.
19700 24,N WHERE N IS A NUMBER OF THE FOLLOWING FORM WILL INCREASE THE
19800 SIZE BY THE LEFT DIGIT OF N. 24 200 WILL MAGNIFY BY 2 AND PUT
19900 THE FAR LEFT SIDE TO THE CENTER OF THE SCREEN. 200.5 WILL KEEP THE
20000 CENTER AS IS. 201 WILL PUT THE FAR RIGHT SIDE TO THE CENTER.
20100 300 WILL MAGNIFY BY 3, ETC.
20200
20300 33 PARAMETER CONTENTS: 33 N. TO SEE EXACT CURRENT CONTENTS
20400 OF PARAMETER NUM. N WHILE IN EDIT MODE.
20500
20600 101 SPACING SCALE: 101, STAFF NUM (101,99 ERASES IT)
20700 (THE SCALE NEED NOT BE ERASED BEFORE SHIFTING IT
20800 TO A NEW STAFF.)
20900
21000 333 N1,N2,N3 PRINTS RN ARRAY FROM ITEM N1 TO ITEM N2. N3=1 FOR LPT.
21100 (USING LPT IS FATAL FOR CURRENT DPY AND MUST BE FOLLOWED BY
21200 <CALL>, F<CR> IN ORDER TO RELEASE THE LPT.)
21300 333 <CR> WILL TYPE DATA FOR ALL ITEMS.
00100 --------- SECTION II --------------
00200
00300 16 LETTERS, WORDS, ETC.:
00400 16, POS, STAFF, NOTE NUM, SIZE FACTOR, P6
00500 ----- THEN TYPE TEXT -----
00600
00700 0-9, A-Z, and = . - , * ( ) " ; : + CAN BE USED.
00800
00900 UP TO 12 CHARACTERS WILL BE PACKED IN AN ITEM.
01000 STRINGS OF MORE THAN 12 CHARACTERS WILL BECOME SEVERAL ITEMS FOR
01100 EDITING PURPOSES.
01200 TO PLACE ITEMS IN RELATION TO ALREADY PRESENT NOTES, SET P6≠0.
01300 SEPARATE EACH ITEM BY SLASHES.
01400 THE SLASHES WILL NOT BE DRAWN.(BUT A LINE ENDED WITH * WILL PRINT *.)
01500
01600 WHEN P6≠0, NUMBERS WILL APPEAR OVER THE NOTES OF THAT STAFF AND YOU
01700 WILL BE ASKED TO TYPE POSITION NUMBERS FOR EACH ITEM. IF P4 (THE
01800 VERTICAL POSITION) IS SET TO 0 YOU SHOULD TYPE 2 NUMBERS FOR EACH
01900 ITEM. SEPARATE THE PAIRS OF NUMBERS BY SLASHES. THE FIRST NUMBER OF
02000 A PAIR WILL BE HORIZANTAL POS., THE SECOND WILL BE VERT. POS. THE
02100 HORIZANTAL NUMBERS WILL BE IN TERMS OF THE NUMBERS OVER THE NOTES.
02200 THUS 1.5,-3/ WOULD PUT ITEM 1 EXACTLY HALF WAY BETWEEN NOTE 1 AND
02300 NOTE 2 AND AT THE VERTICAL POSITION OF NOTE LEVEL -3. WITH
02400 1.5,-3/.7,13/ THE FIRST ITEM WOULD BE AS BEFORE AND THE SECOND WOULD
02500 BE AT .7 OF THE DISTANCE FROM THE BEGINNING OF THE LINE AND THE FIRST
02600 NOTE AND AT THE VERTICAL POSITION 13.
02700
02800 IF P4 IS ANY NON-ZERO NUMBER (AND P6≠0) ALL ITEMS WILL BE PUT AT THE
02900 LEVEL INDICATED IN P4. IN THIS CASE TYPE ONLY ONE NUMBER (FOR
03000 HORIZANTAL POSITION) PER ITEM. THIS IS PROBABLY THE BEST WAY TO PUT
03100 IN THE TEXT OF VOCAL LINES.
03200
03300 CURRENTLY (5/74) THREE TYPE FONTS ARE AVAILABLE. THE DEFAULT FONT IS
03400 CALLED 'PRIMITIVE'. ALSO THERE IS 'BDR40' AND 'BDI40'(ITALICS).
03500 THESE LAST TWO INCLUDE UPPER AND LOWER CASE. ****** NOTE THAT IF THE
03600 TYPE FONTS ARE TO BE MIXED THE FIRST ENTRY MUST INCLUDE A FONT
03700 CONTROL CHARACTER EVEN IF IT IS THE DEFAULT FONT.
03800
03900 FONT CONTROL CHARACTERS:
04000 # = PRIMITIVE (52)
04100 $ = UPPER CASE (48)
04200 % = LOWER CASE (49)
04300 & = BDR40 (NON-ITALICS) (50)
04400 @ = BDI40 (ITALICS) (51)
04500 < = OUTLINE ONLY (53)
04600 > = FILLED (54) (WILL NEVER FILL ON CRT HOWEVER.)
04700
04800 WHEN INITIALLY USING THE TWO 'BD' FONTS THE UPPER-LOWER
04900 CASE CHARACTER MUST APPEAR AS WELL AS THE FONT CHARACTER.
05000 LATER FONT OR CASE CHANGES MAY APPEAR SINGLY.
05100
05200 EXAMPLES: TO GET THE FOLLOWING IN NON-ITALICS -
05300
05400 Clarinet
05500
05600 TYPE - $&C%LARINET/
05700
05800 FOR THE NEXT WITH THE 2ND WORD ITALICS, THE 3RD PRIMITIVE-
05900
06000 TYPE - $&O%BOE/@CRESC./#V.S./
06100
06200 $&<O%BOE/ WOULD PRINT "Oboe" in non-filled letters.
06300
06400 MOST OF THESE COMMANDS ARE SEMI-STICKY. TO BE SAFE THEY SHOULD BE
06500 RESET EACH TIME USED.
06600
06700 WHEN LETTERS ARE EDITED THEY APPEAR UNDER CODE #16.
06800 AT EDIT TIME P13=1 WILL CAUSE HOMING TO A NEARBY NOTE. NOW A
06900 NEGATIVE SIZE FACTOR (IN P5) WILL INVERT THE TEXT. IF THE STAFF SIZE
07000 IS LATER CHANGED THE SPACING CONTINUITY OF STRINGS LONGER THAN 12
07100 LETTERS WILL BE DISTURBED. TO CORRECT THIS SET P10=1 FOR THE
07200 MISPLACED UNIT OF TEXT. IT WILL THEN AUTOMATICALLY RESUME THE
07300 CORRECT POSITION AND RESET P10 TO 0.
00100 -------- SECTION III -----------
00200
00300 *********** LETTER COMMANDS ***************
00400
00500 'G' = GET OLD DATA TO WORK ON.
00600
00700 IF YOU GET THE MESSAGE "UNPACK IT" USE THE MSSAUX PROGRAM.
00800
00900 'GM' = GET MORE TO ADD TO CURRENT DISPLAY
01000
01100 'RS' = RESTART. CLEARS BUFFERS AND SCREEN - NO RECOVERY POSSIBLE!
01200
01300
01400 SAVE ALL: TYPE 'SAVE' OR 'SA' ('SD' SAVES DISPLAY ONLY FOR DPY.F4)
01500
01600 IF 'SAME' IS GIVEN AS A FILE NAME THE NAME WILL BE
01700 SAME AS PREVIOUSLY.
01800
01900 'SB' = SAVE BIG. SAVES ALL IMPORTANT BUFFERS. FOR QUICKER READIN.
02000 'SM' = 'SB' WITH THE SAME NAME AS PREVIOUSLY.
02100 'SF' = FIXUP AND SAVE - REPAIRS TANGLES IN PROGRAM INTERIOR.
02200
02300 TYPE '99' TO BACK UP FROM FILE NAME REQUEST.
02400
02500
02600
02700 'PL' PREPARES FILE TO PLOT MUSIC ON THE CALCOMP PLOTTER OR XGP.
02800
02900
03000 IF THE PAGE IS IN MORE THAN ONE SECTION ALWAYS START WITH THE
03100 BOTTOM SECTION FIRST. YOU WILL BE ASKED FOR FILE NAMES. WHEN THERE
03200 ARE NO MORE TO BE GIVEN TYPE <CR>.
03300 THE QUESTION, "MOVE UP AT END?" SHOULD BE ANSWERED BY Y, N OR WITH
03400 A NUMBER. A NUMBER WILL INDICATE THE NUMBER OF INCHES TO MOVE FROM
03500 THE LEVEL OF STAFF 0 AT POSITION 0 TO STAFF 0, POSITION 0 IN THE
03600 SUCCEEDING FILE.
03700 'Y' WILL PLACE THE SUCCEEDING FILE'S LOWEST POINT ABOUT 1/2" ABOVE
03800 THE HIGHEST POINT OF THE FIRST FILE. 'N' IS USED TO WRITE FILES
03900 EXACTLY ON TOP OF ONE ANOTHER.
04000
04100 IF THE FILE NAMES FORM A SERIES OF 5 LETTER NAMES ENDING WITH
04200 CONSECUTIVE LETTERS OF THE ALPHABET, YOU MAY TYPE THE LAST NAME
04300 FOLLOWED BY THE TOTAL NUMBER OF FILES THAT ARE TO BE PRINTED ON THAT
04400 SINGLE PAGE. THE FILES WILL BE FOUND IN THE PROPER SEQUENCE.
04500 FOR EXAMPLE, 'TRC4D 4' WILL PRINT FILES TRC4D THROUGH TRC4A.
04600 IF A SECOND NUMBER IS TYPED, THE FILES WILL BE EVENLY SPACED
04700 BY THAT NUMBER OF INCHES BETWEEN THE BOTTOM OF EACH STAFF 0 -- AS
04800 DESCRIBED ABOVE.
04900
05000 A SIZE FACTOR OF 1 CREATES THE CORRECT WIDTH FOR 8 1/2" PAPER.
05100
05200 WHEN THE PROGRAM HAS EXITED A FILE CALLED PLT.DMD HAS BEEN WRITTEN ON
05300 THE DSK. THE DATA MAY NOW BE PRODUCED ON THE PLOTTER (BY USING THE
05400 PLOT PROGRAM) OR ON THE XGP (BY USING THE XGP PROGRAM.) (PLOT HAS
05500 NO PROMPTS AND XGP IS SELF-EXPLANATORY.)
05600
05700
05800
05900 ---- FOLLOWING ARE OLD PLOT COMMANDS ----
06000 'P' N1, N2, N3, N4, N5, N6 = PLOT DISPLAY
06100 N1=WIDTH FAC.,
06200 N2=HEIGHT FAC.
06300 N3=1, PLOTS ONLY THIN LINES. N3=2, PLOTS ALL BUT THIN LINES.
06400 N4=1 NO MOVE AT START
06500 N5=1 NO MOVE AT END.
06600 N6= MOVE UP 'N' STAVES AT END.
00100 -------- SECTION IV -----------
00200
00300 ****** VARIOUS WAYS TO GET INTO EDIT MODE ********
00400
00500
00600 TO MOVE LAST ITEM ENTERED LFT-RT OR UP-DOWN:
00700 'L', 'R', 'U' OR 'D' + NUM OF STEPS TO LFT-RT
00800 (NOTHING ELSE REQUIRED)
00900 THIS WORKS ONLY IMMEDIATELY AFTER THE ITEM HAS BEEN ENTERED.
01000
01100
01200 'ED(IT)', POS, STAFF, (CODE NUM) ----- TO USE LIGHT PEN: TYPE 'ED' <CR>
01300
01400 A VERTICAL LINE WILL APPEAR AT THE POSITION GIVEN AND ALL ITEMS
01500 WITHIN 5 SPACES OF THE LINE ON THAT STAFF WILL COME UP FOR EDITING.
01600 TO PASS OVER AN ITEM TYPE <CR>. SEE BELOW FOR METHOD OF CHANGING THE
01700 VARIOUS PARAMETERS.
01800
01900 IF THE STAFF NUMBER IS GREATER THAN 4, ITEMS ON ALL STAVES MAY BE
02000 EDITED.
02100
02200 IF A CODE NUMBER IS GIVEN, THE ITEM NEAREST THE LINE WITH THAT NUMBER
02300 WILL COME UP. FOLLOWING, ALL OTHER ITEMS OF THAT NUMBER ON THAT LINE
02400 WILL COME UP.
02500
02600 WITH THE LIGHT PEN, MOVE CURSOR TO THE ITEM TO BE
02700 EDITED. TYPE <CR> AND ITEMS ON ALL STAVES NEAR THAT POINT
02800 WILL COME UP FOR EDITING IN ORDER. (USES SAME MODE
02900 AS ABOVE.)
03000
03100 S(ET) AND A(LIGN) ---------
03200
03300 IF YOU TYPE 'S' WHILE IN THE ABOVE FORM OF EDIT MODE ('ED') THE
03400 VERTICAL LINE WILL JUMP TO THE POSITION OF THE CURRENT ITEM UNDER
03500 CONSIDERATION. TYPE <CR> TO PROCEED TO OTHER ITEMS. AT THIS POINT
03600 TYPING 'A' WILL AUTOMATICALLY ALIGN THE CURRENT ITEM TO THE POSITION
03700 OF THE ITEM AT 'SET'. TYPE 'X' TO EXIT FROM ANY EDIT MODE.
03800
03900 'L'=LIGHT PEN --- THIS MAY BE USED IN ANY FORM OF EDIT MODE. MOVE
04000 THE CURSOR TO THE LOCATION DESIRED FOR THE ITEM.
04100 <CR> WILL MOVE THE ITEM. NOTE THAT HORIZANTAL
04200 MOVEMENT IS FREE BUT VERTICAL MOVEMENT IS BY STAFF
04300 NUMBERS. ALL DETAILS OF VERTICAL MOVEMENT MUST BE
04400 TYPED IN.
04500
04600
04700 'I' N = EDIT ITEM NUMBER N
04800 THIS MAY BE TYPED AT ANY TIME WHILE IN EDIT MODE.
04900 THE ITEM INDICATED WILL NEXT COME UP.
05000 'ST' STAFF NUM, CODE NUM--EDITS ONLY ITEMS OF THAT CODE NUM ON
05100 THAT STAFF. IF CODE=0, THEN ALL ITEMS WILL COME UP.
05200
05300
05400 *********** HOW TO CHANGE PARAMETERS ****************
05500
05600
05700 IN EDIT MODE: 'L','R','U', OR 'D' FOLLOWED BY N, MOVES N SPACES TO
05800 LEFT, RIGHT, UP OR DOWN. 2 DIRS. MAY BE GIVEN AT ONCE.
05900
06000 ****-- OR --****
06100
06200 PN1,N1 PN2,N2 PN3,N3 ETC. (TYPE PAIRS OF NUMS TO CHNG PARAMS)
06300 THE FIRST OF EACH PAIR MUST BE THE PARAMETER NUMBER
06400 AND THE SECOND WILL BE THE NEW VALUE FOR THAT PARAM.
06500
06600 IF 2 ZEROS ARE ADDED AFTER A PARAMETER NUMBER (i.e.
06700 600 INSTEAD OF 6) THE SECOND NUMBER OF THE PAIR
06800 WILL BE ADDED TO THE CURRENT VALUE OF THAT PARAMETER
06900 INSTEAD OF MERELY REPLACING. THIS IS USEFUL FOR
07000 EXTENDING P6 OF SLURS OR BEAMS, ETC.
07100
07200 <CR> ENDS EDIT AND MOVES TO NEXT ITEM FOR EDIT
07300 'X' ENDS EDIT, EXITS TO INPUT MODE
07400 'C'SAVES OLD AND NEW FORMS, I.E. "COPIES" ITEM.
07500 'C' N SAVES & MOVES TO ITEM N.
07600 'DEL' DELETES ITEM AND MOVES ON TO NEXT
07700
07800 HOMING **** SET P13=1 TO HOME IN ON ANY NEARBY NOTE ON SAME STAFF.
07900 (P13 RESETS SELF TO 0)
08000
08100
08200 GROUP EDIT COMMANDS - - - - - - -
08300
08400 'MOVE' OR 'M' <CR>: TO MOVE GROUPS OF ITEMS
08500
08600 YOU WILL ASKED TO TYPE: STAFF NUM, POS1, POS2, (CODE NUM)
08700 TO SHRINK OR EXPAND ALL STAVES GIVE A STAFF NUM > 10.
08800 IF NO CODE NUM IS GIVEN ALL ITEMS IN THE AREA WILL BE MOVED.
08900
09000 IF 'L' IS GIVEN AS STAFF NUM, THE AREA TO BE MOVED MUST
09100 BE INDICATED WITH THE LIGHT PEN.
09200
09300 ----- 'ASK' FEATURE ------
09400 IF 100 IS ADDED TO THE CODE NUM, YOU WILL BE ASKED IF YOU
09500 WANT TO MOVE EACH ITEM INDIVIDUALLY. 'X' WILL EXIT FROM 'MOVE'.
09600
09700 TYPE '99' AT ANY TIME TO BACKUP WHEN IN 'MOVE', 'COPY', ETC.
09800
09900
10000 'COPY' OR 'C' <CR>: TO COPY GROUPS OF ITEMS.
10100
10200 WORKS SAME AS 'MOVE' BUT ORGINAL IS LEFT BEHIND.
10300
10400 'DELETE' OR 'DE' <CR>: TO DELETE GROUPS OF ITEMS.
10500
10600 SAME STRUCTURE AS 'MOVE'.
10700
10800 ******* N,-99 WILL DELETE ALL LINES EXCEPT! LINE 'N'.
10900 ******** USE WITH GREAT CARE!! *********
11000
11100 'ALTER' OR 'A' <CR>: TO ALTER GROUPS OF ITEMS.
11200
11300 FIRST PART IS SAME AS 'MOVE'. AFTER THE AREA HAS BEEN
11400 DESIGNATED YOU WILL BE ASKED TO SPECIFY PARAMETER CHANGES
11500 WITH PAIRS OF NUMBERS -- Pn, Change, Pn, Change, etc.
11600
11700 IF THE FIRST NUMBER GIVEN IS 12 AND YOU HAVE ALREADY
11800 SPECIFIED CODE NUM 1, ALL NOTE STEMS, BEAMS AND SLURS
11900 IN THE GIVEN AREA WILL BE INVERTED.
12000
12100 WITH CODE 8 (SLURS), 12 WILL REVERSE THE CURVE AND PUT
12200 IT ON THE "WRONG" SIDE OF THE NOTE.
12300
12400 'DP' N1, N2, . . . . .: COVERS OR UNCOVERS PARTS OF DISPLAY
12500 END WITH A 99 TO MAKE THE EFFECT IMMEDIATE.
12600
12700 'J' WILL AUTOMATICALLY JUSTIFY LINES, ALLOWING PROPER SPACES FOR
12800 FOR MOST ACCIDENTALS, CLEFS, ETC. A STAFF NUM >5 WILL JUSTIFY
12900 ALL LINES AS A UNIT. IF POS2 = 0, IT WILL BE TAKEN AS 200.
13000 ****NOTE: WHILE YOU CAN START FROM ANY HORIZANTAL POSITION
13100 (POS1), THE END POINT MUST BE ≥ THE POSITION OF THE LAST ITEM
13200 ON THE LINE.
00100 -------- SECTION V ---------
00200
00300 'SCORE' ITEMS: NOTES-- 14, 0, STAFF
00400
00500 144 (INSTEAD OF 14)WILL READ EDIT FILE. SEE BELOW FOR FILE
00600 FORMAT. THE PROGRAM WILL ASK FOR STAFF NUMBER AND FILE NAME.
00700
00800 ****** THERE ARE 2 INPUT MODES POSSIBLE. THE 1ST DEALS SEPARATELY
00900 WITH PITCH AND RHYTHM PARAMETERS. THE 2ND COMBINES THEM
01000 IN ONE INPUT LIST. ALL THE EXAMPLES BELOW (UNTIL MODE 2
01100 IS MENTIONED) WILL REFER TO MODE 1.
01200 TO USE MODE 2 SET P2 TO + OR - 2. e.g. 14 2 -3
01300
01400 ---- IF P2 IS NEG. (I.E. '14 -1 2' OR '144 -1'), STAFF 4 WILL
01500 BE SET UP AUTOMATICALLY BY THE FIRST STAFF ENTERED.
01600 --- SEE BELOW ABOUT THE USE OF STAFF 4. ---
01700
01800 **** HOW TO USE "SCORE" ITEMS ****
01900
02000 NOTES ARE TYPED IN ALMOST EXACTLY AS IN THE "SCORE" PROGRAM.
02100 I.E. S=#, F=b, N=NATURAL (bb AND ## ARE NOT AVAILABLE YET.)
02200 OCTAVE NUMBERS MUST BE USED. 'P' (FOR PROXIMITY MODE) MAY
02300 BE USED. 'O' RETURNS TO ORDINARY MODE.
02400 R=REST RI=INVISIBLE REST - BOTH OF THESE MUST BE GIVEN TIME VALUES
02500 UNDER 'RHYTHM'.
02600
02700 TREBLE CLEF IS ASSUMED. TO ENTER A CLEF, TYPE CLEF NAME
02800 FOLLOWED BY A SLASH. (TR/ BA/ AL/ TEN/) PRECEDED THE CLEF
02900 NAME BY A MINUS SIGN (-BA/) TO HAVE THE AFFECT OF A CLEF WITHOUT
03000 THE CLEF ACTUALLY APPEARING. (IF NO CLEF IS GIVEN IT WILL ALWAYS
03100 BE TREBLE CLEF POSITION.)
03200
03300 USE 'M' (FOR MEASURE) TO ENTER A BAR LINE. 'M2' WILL MAKE A BAR GO
03400 UP 2 STAVES; 'M3' WILL GO UP 3 STAVES, ETC.
03500
03600 METER (TIME SIGNATURE) MAY BE ENTERED WITH /Tn,m/ WHERE n,m ARE
03700 THE TOP AND BOTTOM METER NUMBERS.
03800
03900 FOR KEY SIGS TYPE /Kna/ WHERE n=NUMBER OF ACCIDENTALS AND
04000 a='S' OR + FOR SHARPS, OR - OR 'F' FOR FLATS.
04100
04200 NO MORE THAN 72 CHARACTERS MAY APPEAR
04300 ON ONE LINE OF INPUT. (BUT MORE THAN ONE LINE MAY BE USED.)
04400 THE LINE MUST END WITH A SEMICOLON OR, WHEN NO MORE NOTES ARE
04500 TO APPEAR, WITH '*'.
04600
04700 THE MOTIVIC FEATURES OF "SCORE" MAY BE USED WITH INPUT
04800 MODE 1 (BUT WITH NO "NESTING"). MOTIVES ARE SAVED
04900 WITH DISPLAY DATA AND CAN BE REUSED WHEN WORKING LATER.
05000 (NO MORE THAN 200 ITEMS CAN BE SAVED IN ANY LIST OF MOTIVES.)
05100
05200 CHORDS ARE CONSTRUCTED BY USING THE COLON IN PLACE OF THE SLASH
05300 BETWEEN NOTES.
05400 THE COLON CAUSES THE NOTE TO OCCUPY THE SAME RHYTHMIC POSITION
05500 AS THE FIRST NOTE TO APPEAR AFTER A COLON. THE STEM DIRECTION IN
05600 CHORDS WILL BE DETERMINED BY THE ORDER OF APPEARANCE OF THE NOTES.
05700 IF THE FIRST NOTE IS THE LOWEST, THE STEM GOES UP; IF THE FIRST IS
05800 THE HIGHEST, THE STEM GOES DOWN. POSITIONING OF NOTES ON PROPER
05900 SIDE OF STEM AND (IN MOST CASES) SPACING OF ACCIDENTALS AND DOTS
06000 IS AUTOMATIC.
06100 NOTE THAT SINCE ALL THE NOTES OF A CHORD USE ONLY ONE RHYTHM
06200 ALL REPEAT FEATURES CONSIDER ALL NOTES OF A CHORD AS ONE
06300 ENTITY. / C4 / D:F:A / REP 2 3/ WILL DRAW THE SEQUENCE
06400 C, D MINOR CHORD THREE TIMES. / D:F:A X3/ DRAWS 3 CHORDS.
06500 / D:F:A //// MAKES 4 CHORDS.
06600
06700
06800 ALL NON-RHYTHMIC ITEMS (CLEFS, ETC.) WILL BE IGNORED IN
06900 REGARD TO THE 1ST NUMBER AFTER 'REP'.
07000 / C4 / M / D:F:A / REP 2,3 / WILL CONSIDER THE 2 ITEMS
07100 TO BE 'C' AND THE D MINOR CHORD, BUT THE BAR LINE WILL
07200 BE INCLUDED IN THE REPEAT. THUS THE PROGRAM WILL DRAW
07300 'C', BAR, D MINOR - THREE TIMES.
07400
07500 GRACE NOTES MAY BE USED -- SEE UNDER RHYTHM BELOW.
07600
07700 TO BY PASS AUTOMATIC STEM DIRECTIONS TYPE SU/ (STEM UP) OR
07800 SD/ (STEM DOWN). ONCE EITHER OF THESE APPEARS ALL THE STEMS WILL
07900 GO IN THE INDICATED DIRECTION UNTIL A CHANGE IS GIVEN.
08000
08100 (INPUT MODE 1)
08200 EX. M/BASS/ K4F /T12 8 /C3/EF/E/ M /D X 3/EN2:GS:B/M*
08300
08400 A BAR LINE COMES FIRST, THEN BASS CLEF.
08500 NEXT IS A 4 FLAT KEY SIGNATURE, FOLLOWED BY 12/8 TIME.
08600 THE 3RD NOTE WILL BE AN 'E' WITH NO ACCIDENTAL.
08700 A BAR LINE WILL PRECEED THE THREE Ds.
08800 THE LAST 3 NOTES WILL BE AN E MAJOR CHORD.
08900 ENDS WITH A BAR LINE.
09000 (In the example above the spaces on either side of the
09100 slashes are optional [to help proof reading]. The other
09200 spaces, i.e. in "12 8" and in "D X 3" are required.)
09300
09400 AFTER THE LAST NOTE HAS BEEN ENTERED THE PROGRAM WILL
09500 ASK FOR 'POS1, POS2'.
09600 THE NOTES WILL BE EVENLY SPACED BETWEEN THE 2 POSITIONS ENTERED.
09700 (<CR>=0,200) NEXT YOU WILL BE ASKED TO 'TYPE RHYTHM'.
09800 '99' WILL BACK UP, '999' WILL ESCAPE FROM "SCORE" MODE.
09900
10000 A rhythmic duration must be given for each note, rest or
10100 chord previously entered. (Clefs, bar lines, etc. should
10200 ignored.)
10300
10400 FOLLOW THE SAME RULES AS IN "SCORE". THE SINGLE DOTTED DUPLE RHYTHMS
10500 WILL AUTOMATICALLY PUT DOTS ON NOTES. MORE COMPLEX RHYTHMS MUST BE
10600 DOTTED INDIVIDUALLY. (THEY WILL BE CORRECTLY SPACED.)
10700
10800 4 16TH NOTES, A QUARTER, A DOTTED 8TH, 16TH, HALF,
10900 3 TRIPLETS, AND A WHOLE NOTE FOLLOW:
11000
11100 16////4/8./16/2/12///1*
11200
11300 ***** NOTE THAT CHORDS WITH WHOLE NOTE RHYTHM WILL APPEAR
11400 WITH A STEM. THE STEM IS NEEDED TO INSURE PROPER
11500 PLACEMENT OF NOTES A SECOND APART. YOU!! MUST
11600 REMOVE SUCH STEMS AFTER THE LINE IS COMPLETE!! *****
11700
11800 **** FOR GRACE NOTES, TYPE RHYTHMIC VALUE OF 88.
11900
12000 ****** INPUT MODE 2 ******** ONLY DIFFERENT FOR NOTES AND RHYTHMS
12100
12200 IN THIS CASE EACH NEW RHYTHMIC VALUE MUST BE ENTERED JUST BEFORE
12300 THE NOTE (OR CHORD) TO WHICH IT WILL APPLY. REPEAT FEATURES WILL
12400 ACT IN THE NORMAL WAY.
12500
12600 TR/4 C4/ D / 8 E/F// 16 G/ A/ 4//REP 4*
12700 PRODUCES - TREBLE CLEF, QUARTER-C, QUARTER-D, EIGHTH-E,
12800 2 TIMES 8TH-F, 16TH-G, 16TH-A, QUARTER-A, QUARTER-A, THE LAST 4
12900 ITEMS (G A A A)REPEAT WITH THEIR GIVEN RHYTHMS.
13000 OF COURSE THERE WILL NOW BE NO PROMPT FOR RHYTHMS.
13100
13200
13300 THE NEXT REQUEST IS 'ADD MARKS?' TYPE 'Y', 'N', 99 OR 999.
13400 IF 'YES' GIVE NOTE NUMBERS AND MARK NAMES OR NUMBERS AS NEEDED. WHEN
13500 COUNTING NOTES, IGNORE RESTS, CLEFS ETC. CHORDS COUNT AS 1 NOTE.
13600 THE NUMBER FOR THE ACCENTS, ETC. ARE 4=∧(WEDGE),5=>(ACCENT),
13700 6=FERMATA, 7=DOT, 9=TENUTO(DASH), 11=DOWN BOW, 12=UP BOW,
13800 13=HARMONIC, 14=+, ETC.(SEE CODE 6. UP TO 2 MARKS MAY BE ENTERED FOR
13900 EACH NOTE -- BUT EACH MARK MUST BE ENTERED SEPARATELY WITH ITS NOTE
14000 NUMBER. THE MARK NUMBERS ARE THE SAME AS THOSE FOR P5 WITH CODE# 6.)
14100
14200 EXAMPLE: 1,5 / 6,5 / 7,9 / 10,7 / 10,9*
14300 - OR - 1 ACC/6 ACC/7 TEN/10 STAC/10 TEN*
14400
14500 NEXT YOU WILL BE ASKED 'ADD BEAMS?' TYPE 'Y' OR 'N'. TO THIS.
14600 '99' WILL BACK UP, '999' WILL ERASE INPUT AND
14700 LEAVE "SCORE" MODE.
14800
14900 'G' (FOR GO) (INSTEAD OF 'Y' OR 'N') WILL OMIT ALL FURTHER
15000 PROMPTS IN THIS MODE.
15100
15200 BEAMS WILL BE ENTERED AUTOMATICALLY IF YOU TYPE NB* WHERE N=THE
15300 NUMBER OF EIGHTH NOTES TO BE BEAMED TOGETHER. 2B* WILL BEAM BY
15400 QUARTERS (I.E. 2 8THS), 3B* GIVES STANDARD BEAMING FOR 3/8 OR 6/8
15500 TIME. DECIMAL NUMBERS MAY BE USED FOR N. THUS 1.5B* WOULD BEAM EACH
15600 GROUP OF 3 16THS.
15700
15800 IF IRREGULAR BEAMS ARE NEEDED, GIVE THE NOTE NUMBERS FOR THE FIRST
15900 AND LAST NOTES UNDER THE BEAMS. IF THE SECOND NUMBER IS NEGATIVE THE
16000 STEMS FOR THE GROUP WILL GO DOWNWARD.
16100 WHEN COUNTING NOTES, IGNORE RESTS, CLEFS ETC. CHORDS COUNT AS
16200 ONE NOTE.
16300
16400 IF YOU HAVE 4 16TH NOTES (STEMS UP) FOLLOWED BY 2 QUARTERS
16500 AND 3 8THS (STEMS DOWN) TYPE:
16600
16700 1,4 / 5, -7 *
16800
16900 SOME PARTIAL BEAMS MAY HAVE TO BE ADDED INDIVIDUALLY AS YET.
17000
17100 ****** AUTOMATIC BEAMS ****** IN MOST SIMPLE SITUATIONS ALL THE
17200 BEAMS MAY BE PLACED AUTOMATICALLY BY SIMPLY TYPING "2B*". (OR
17300 "3B*") 2B* WILL CAUSE ALL LOGICAL BEAM CONNECTIONS TO BE MADE
17400 IN TERMS OF DUPLE RHYTHM. USE 3B* FOR TRIPLE RHYTHMS SUCH AS
17500 3/8, 6/8, 9/8, ETC. THE BASIC UNIT FOR 2B* IS THE QUARTER NOTE
17600 AND THE BASIC UNIT FOR 3B* IS THE DOTTED QUARTER.
17700
17800
17900 LASTLY YOU WILL BE ASKED 'ADD SLURS?'
18000 TYPE 'Y' OR 'N'. TO THIS.
18100
18200 IF SLURS ARE ADDED, THE ORDER NUMBERS OF THE NOTES AT THE BEGINNING
18300 AND END OF THE SLUR MUST BE GIVEN. IF THE SECOND NUMBER IS NEGATIVE
18400 THE 'DIP' WILL BE DOWNWARD AND THE STEMS WILL GO UP. VICE-VERSA FOR
18500 A POSITIVE SECOND NUMBER. IF YOU HAVE USED THE 'B' FEATURE ABOVE
18600 (AUTOMATIC BEAMS) THEN THE NEGATIVE AND POSITIVE DIPS WILL ALSO BE
18700 AUTOMATIC - HENCE NO NEED TO USE ANY NEGATIVE NUMBERS AT THIS POINT.
18800
18900 THE AMOUNT OF CURVE WILL DEPEND ON THE CONFIGURATION OF THE
19000 NOTES BETWEEN THE END POINTS. IN EXTREME SITUATIONS IT IS PROBABLE
19100 THAT THE RESULT OF THIS AUTOMATIC PROCEDURE WILL HAVE TO BE EDITED.
19200
19300 A TYPICAL EXAMPLE OF INPUT: 2,-3/ 2,-7/ 8,11*
19400
19500 THIS WILL PUT SLURS FROM 2ND TO 3RD NOTE, 2ND TO 7TH
19600 AND 8TH TO 11TH.
19700
19800 TO SLUR INTO THE 1ST NOTE, TYPE -1,1/ OR -1, -1/. TO SLUR OUT FROM
19900 THE LAST NOTE, TYPE N,99* OR N,-99* WHERE N=NUMBER OF LAST NOTE.
20000
20100 THE 'SLUR' SECTION MAY ALSO BE USED TO INVERT ANY STEMS FROM
20200 THEIR NATURAL DIRECTIONS OR FROM THE DIRECTIONS TO WHICH THEY HAVE
20300 BEEN TURNED BY THE 'DIP' OF THE ENTERED SLURS. TO DO THIS SIMPLY ADD
20400 100 TO THE FIRST NOTE NUMBER OF A PAIR. IF 2ND NUMBER IS PLUS, THE
20500 STEMS GO UP; IF 2ND NUMBER IS NEGATIVE, STEMS GO DOWN. THIS WILL
20600 ONLY INVERT THE STEMS OF THE NOTES INVOLVED; ANY SLURS INVOLVING
20700 THESE NOTES SHOULD BE ENTERED WITH PAIRS OF NUMBERS PREVIOUS TO THE
20800 PAIRS WHICH WILL INVERT THE STEMS.
20900 ***** NOTE THAT TIES BETWEEN THE INNER NOTES OF TWO CHORDS CANNOT
21000 BE DONE AUTOMATICALLY AS YET.
21100
21200
21300 ∞∞∞∞∞ FOR 'BEAMS', 'MARKS' AND 'SLURS' A 2ND LINE OF INPUT MAY BE
21400 GIVEN IF THE 1ST LINE ENDS WITH ';' INSTEAD OF '*'.
21500
21600 ALL ITEMS ENTERED UNDER '14' MAY BE EDITED LATER AS IF THEY
21700 WERE ENTERED INDIVIDUALLY.
21800
21900 FOR CODE # 144: FOLLOWING IS THE FILE FORMAT FOR "SCORE" INPUT FROM
22000 AN EXTERNALLY EDITED FILE. THE NAME OF THE FILE CAN HAVE NO MORE
22100 THAN FIVE LETTERS.
22200
22300 00100 (NOTES) . . . *
22400 00200 (RHYTHM) . . . *
22500 00300 (ACCENTS) . . * BLANK LINE = NO MARKS
22600 00400 (BEAMS) . . * A BLANK LINE = NO BEAMS
22700 00500 (SLURS) . . * BLANK LINE = NO SLURS
22800
22900 (2ND LINES MAY BE ADDED WITH ALL ITEMS EXCEPT RHYTHM.)
23000
23100 THIS SEQUENCE MAY BE REPEATED SEVERAL TIMES. THE PROGRAM WILL
23200 ASK FOR EACH OF THE STAFF NUMBERS.
23300
23400
23500 **** SUMMARY OF SCORE CODES ****
23600
23700 NOTES A-G
23800 ACCIDENTALS F-S-N
23900 REST R, RI FOR INVISIBLE REST
24000 CLEFS TR-BA-AL-TE -TR, -BA, ETC. =INVISIBLE CLEF
24100 BAR, MEASURE M
24200 KEY SIG. KnS OR KnF
24300 METER, TIME SIG. Tn,m
24400 STEM DIRECTION SU-SD
24500 iXn REPEAT ITEM i A TOTAL OF n TIMES.
24600 REP n,m REPEAT LAST n ITEMS A TOTAL OF m TIMES.
24700 ACCENT A
24800 WEDGE W
24900 TENUTO T
25000 STACCATO S
25100 HARMONIC H
25200 FERMATA F
25300 DOWN BOW D
25400 UP BOW U
25500 + P
25600 THESIS 15
25700 ARSIS 16
00100 --------- SECTION VI -----------
00200
00300 ********* TO SET UP AUTOMATIC IRREGULAR RHYTHMIC SPACING *******
00400 --- STAFF 4 ---
00500
00600 ANY NOTES WHICH APPEAR ON STAFF 4 WILL CAUSE ALL ITEMS LATER
00700 ENTERED WITH '14' OR '144' TO BE SPACED ACCORDING TO THE SPACING
00800 GIVEN ON STAFF 4. FOR STAFF 4 DO NOT USE ANY RESTS AND RHYTHMS MAY
00900 NOT BE INDICATED BY HORIZANTAL BEAMS. SINGLY DOTTED NOTES MAY BE
01000 USED BUT ONLY DUPLE DIVISIONS ARE TO BE USED.
01100 (I.E. NO TRIPLETS OR DOUBLE DOTS, ETC. NOTE HOWEVER THAT
01200 ANY! RHYTHMIC UNITS MAY BE USED IF THEY ARE PUT ON STAFF 4
01300 BY THE AUTOMATIC PROCEDURE WHEREIN YOU TYPE EITHER 14 -1 STFn
01400 OR 144 -1 (OR -2). IF STAFF 4 IS BLANK, SETTING P2
01500 NEGATIVE WILL CAUSE A DUPLICATE OF THE FIRST LINE YOU
01600 ENTER TO APPEAR ON STAFF 4. IT WILL BE SPACED ACCORDING
01700 TO THE RHYTHM AND WHATEVER ADJUSTMENTS ARE NEEDED FOR
01800 CLEFS, ETC. ALL FURTHER LINES ENTERED WILL CONFORM TO
01900 THIS SPACING UNLESS STAFF 4 IS DELETED.)
02000
02100 BE SURE TO ACCOUNT FOR ALL BAR LINES, CLEFS, METERS, ETC.
02200
02300 AFTER ALL OTHER NOTES ARE PLACED TO SATISFACTION ERASE ALL OF STAFF 4
02400 WITH 'DELETE'.
02500
02600 IN GENERAL, IT IS PROBABLY BETTER TO USE MANY SMALL VALUES ON
02700 STAFF 4. THIS WAY IT IS EASIER TO MAKE MANY DELICATE ADJUSTMENTS.
02800
02900 ******* MSSAUX ********
03000
03100 THIS IS A PROGRAM TO EXTRACT PARTS FROM PREVIOUSLY CREATED
03200 SCORES OR TO PACK SEVERAL MSS.DAT FILES INTO ONE FOR EASIER STORAGE.
03300 THE PROGRAM WILL ASK "PARTS, PACK OR UNPACK?" A FULL WORD
03400 MUST BE GIVEN IN REPLY. WHEN ASKED FOR OUTPUT FILE NAMES BE SURE
03500 THAT ANY NAME GIVEN IS NOT!! ALREADY IN USE.
03600
03700 ---- PARTS ----
03800
03900 WHEN ASKED "TYPE TOP STAFF #", GIVE THE HIGHEST STAFF NUMBER
04000 YOU WANT USED FOR THIS SECTION OF THE PART INVOLVED. IF YOU TYPE "2"
04100 THE LINES 2, 1, 0, ETC. WILL BE USED UNTIL BUFFER SPACE IS EXHAUSTED.
04200
04300 WHEN REPLYING TO "READ WHICH STAFF #?" THREE NUMBERS MAY BE
04400 TYPED. THE FIRST WILL BE THE STAFF NUMBER OF THAT SECTION OF THE
04500 ORIGINAL SCORE TO BE READ, THE SECOND WILL BE A TRANSPOSITION NUMBER
04600 (BY NOTE STEPS -- NOT! 1/2 STEPS) AND IF THE THIRD NUMBER IS GREATER
04700 THAN ZERO THIS QUESTION WILL NOT BE ASKED AGAIN AS SUCCESSIVE FILES
04800 ARE READ IN.
04900
05000 THE MESSAGE "NO ROOM FOR THIS ONE" MEANS THE BUFFER DOES NOT HAVE
05100 ROOM LEFT FOR ANOTHER COMPLETE LINE. THIS LAST LINE WILL BE
05200 COMPLETELY IGNORED. THEN YOU MUST START ANOTHER FILE.
05300
05400 TRANSPOSITIONS FOR "Bb" INSTRUMENTS AND FOR "F" INSTRUMENTS WILL
05500 AUTOMATICALLY FIX MOST OF THE NEEDED CHANGES IN ACCIDENTALS. HOWEVER
05600 THERE ARE MANY CASES WHERE WRONG RESULTS MIGHT OCCUR (SUCH AS WITH
05700 NOTES TIED OVER BAR LINES, ETC.) SO CAREFUL PROOF READING IS
05800 ESSENTIAL.
05900
06000 ---- PACK AND UNPACK ---- FOLLOW THE PROMPTS.
00100 INDEX TO SUBROUTINES:
00200
00300 FILE NAME:
00400 MSS
00500 NOTWRT NOTWRT
00600
00700 ITMSBX ITMSUB
00800 BMS
00900 METER
01000 RNOTE
01100 MAKNUM
01200
01300 PLTSRT RHORZ
01400 SLUR
01500 JUGGLE
01600 LOOP
01700 PLTSRT
01800 BOX
01900 LINES
02000 RDRAW
02100
02200 HOMER HOMER
02300 PLACE
02400 FINDIT
02500 IABS
02600 BLOCK DATA
02700 DRWNT
02800
02900 MOVER MOVER
03000 RTLINE
03100 EXTEN
03200 MVBEAM
03300 CLEFS
03400 MVBX
03500
03600 GRED VLINE
03700 ASKIT
03800 GRED
03900 LPEN
04000 DELETE
04100 DPYNEW
04200 PLTCMD
04300 SAVIT
04400 LISTP
04500 FIXUP
04600
04700 TREST ALPHA
04800 TAIL
04900 REST
05000 ROFF
05100 UNPACK
05200 BREP
05300 FERMTA
05400 SORT2
05500 NOZERO
05600 PNUM
05700 SPACER
05800 NOIR
05900 KSIG
06000 RJBX
06100 CENTX
06200 JDRAW
06300
06400 WORDS WORDS
06500 TYPE
06600 SETLET
06700 SCL
06800 NEWR
06900
07000 PRESCN
07100
07200 SCANR SCANR
07300 NALF
07400 EDIT
07500
07600 SCMSS
07700
07800 SCRHYX RHYTH
07900 SETUP
08000 MARKS
08100 DOTS
08200
08300 NOTBMZ NOTES
08400 BMX
08500
08600 BEAMS BEAMS
08700 XNOTE
08800
08900 FILLER FILLER
09000 HGHT
09100 MISS
09200 HALF
09300
09400 FILLMS FILLMS
09500 ROTATE
00100 ***** PRNTX.DO ****** (PREPARES FILE FOR 'PLOTIT.F4')
00200 LOA MPL←/DUMP %DMPRNT,NOTWRT,ITMSBX,FILLER,MSSIO
00300 ,PPSRT,TREST,LOOK,PLTIT↔
00400
00500 XXXXXX DOMS.DO XXXXXX(TO GET NECESSARY BASIC DATA READ IN BEFORE DUMP.)
00600 LOA MM←/DUMP @DDTMSS[1,LCS]↔AL Y↔S↔G↔INIT↔βAL↔SA MM↔
00700
00800
00900 ******** ZZ.DO ******
01000 LOA @ZZ↔βSA MM↔
01100
01200 ********* ZZ.CMD ********
01300 %D MXX,MOVER,GRED,NOTWRT,HOMER,ITMSBX,WORDS
01400 ,TREST,PLTSRT,SCMSS,SCANR,LOOK
01500 ,NOTBMZ,BEAMZ,SCRHYX,FILLMS,FILLER,CURSOR.REL[MSS,LCS],MSSIO